(find-auto-coding): Don't search for line-ending characters past the

end of the tail.

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 6d1a17cba42fbc693219136fdd6ad5370e29c2eb..52bf6229b9709477023730976c8641fac590bfe0 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1735,7 +1735,7 @@ If nothing is specified, the return value is nil."
        ;; is just "\r" and we can't use "^" nor "$" in regexp.
        (when (and tail-found (or (not coding-system) (not char-trans)))
          (goto-char tail-start)
-         (re-search-forward "[\r\n]\^L" nil t)
+         (re-search-forward "[\r\n]\^L" tail-end t)
          (if (re-search-forward
               "[\r\n]\\([^[\r\n]*\\)[ \t]*Local Variables:[ \t]*\\([^\r\n]*\\)[\r\n]"
               tail-end t)